home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / EDITORS / MEMACS / H / Ebind < prev    next >
Text File  |  1990-06-26  |  10KB  |  324 lines
  1. /*    EBIND:        Initial default key to function bindings for
  2.             MicroEMACS 3.10
  3. */
  4.  
  5. /*
  6.  * Command table.
  7.  * This table  is *roughly* in ASCII order, left to right across the
  8.  * characters of the command. This explains the funny location of the
  9.  * control-X commands.
  10.  */
  11. NOSHARE KEYTAB    keytab[NBINDS] = {
  12.     {CTRL|'A',        BINDFNC,    gotobol},
  13.     {CTRL|'B',        BINDFNC,    backchar},
  14.     {CTRL|'C',        BINDFNC,    insspace},
  15.     {CTRL|'D',        BINDFNC,    forwdel},
  16.     {CTRL|'E',        BINDFNC,    gotoeol},
  17.     {CTRL|'F',        BINDFNC,    forwchar},
  18.     {CTRL|'G',        BINDFNC,    ctrlg},
  19.     {CTRL|'H',        BINDFNC,    backdel},
  20.     {CTRL|'I',        BINDFNC,    tab},
  21.     {CTRL|'J',        BINDFNC,    indent},
  22.     {CTRL|'K',        BINDFNC,    killtext},
  23.     {CTRL|'L',        BINDFNC,    refresh},
  24.     {CTRL|'M',        BINDFNC,    newline},
  25.     {CTRL|'N',        BINDFNC,    forwline},
  26.     {CTRL|'O',        BINDFNC,    openline},
  27.     {CTRL|'P',        BINDFNC,    backline},
  28.     {CTRL|'Q',        BINDFNC,    quote},
  29.     {CTRL|'R',        BINDFNC,    backsearch},
  30.     {CTRL|'S',        BINDFNC,    forwsearch},
  31.     {CTRL|'T',        BINDFNC,    twiddle},
  32.     {CTRL|'U',        BINDFNC,    unarg},
  33.     {CTRL|'V',        BINDFNC,    forwpage},
  34.     {CTRL|'W',        BINDFNC,    killregion},
  35.     {CTRL|'X',        BINDFNC,    cex},
  36.     {CTRL|'Y',        BINDFNC,    yank},
  37.     {CTRL|'Z',        BINDFNC,    backpage},
  38.     {CTRL|'[',        BINDFNC,    meta},
  39.     {CTLX|CTRL|'A',        BINDFNC,    fileapp},
  40.     {CTLX|CTRL|'B',     BINDFNC,    listbuffers},
  41.     {CTLX|CTRL|'C',     BINDFNC,    quit},
  42.     {CTLX|CTRL|'D',     BINDFNC,    detab},
  43.     {CTLX|CTRL|'E',     BINDFNC,    entab},
  44.     {CTLX|CTRL|'F',     BINDFNC,    filefind},
  45.     {CTLX|CTRL|'I',     BINDFNC,    insfile},
  46.     {CTLX|CTRL|'K',        BINDFNC,    macrotokey},
  47.     {CTLX|CTRL|'L',     BINDFNC,    lowerregion},
  48.     {CTLX|CTRL|'M',     BINDFNC,    delmode},
  49.     {CTLX|CTRL|'N',     BINDFNC,    mvdnwind},
  50.     {CTLX|CTRL|'O',     BINDFNC,    deblank},
  51.     {CTLX|CTRL|'P',     BINDFNC,    mvupwind},
  52.     {CTLX|CTRL|'R',     BINDFNC,    fileread},
  53.     {CTLX|CTRL|'S',     BINDFNC,    filesave},
  54.     {CTLX|CTRL|'T',     BINDFNC,    trim},
  55.     {CTLX|CTRL|'U',     BINDFNC,    upperregion},
  56.     {CTLX|CTRL|'V',     BINDFNC,    viewfile},
  57.     {CTLX|CTRL|'W',     BINDFNC,    filewrite},
  58.     {CTLX|CTRL|'X',     BINDFNC,    swapmark},
  59.     {CTLX|CTRL|'Z',     BINDFNC,    shrinkwind},
  60.     {CTLX|'?',        BINDFNC,    deskey},
  61.     {CTLX|'!',        BINDFNC,    spawn},
  62.     {CTLX|'@',        BINDFNC,    pipecmd},
  63.     {CTLX|'#',        BINDFNC,    filter},
  64.     {CTLX|'$',        BINDFNC,    execprg},
  65.     {CTLX|'=',        BINDFNC,    showcpos},
  66.     {CTLX|'(',        BINDFNC,    ctlxlp},
  67.     {CTLX|')',        BINDFNC,    ctlxrp},
  68.     {CTLX|'<',        BINDFNC,    narrow},
  69.     {CTLX|'>',        BINDFNC,    widen},
  70.     {CTLX|'^',        BINDFNC,    enlargewind},
  71.     {CTLX|' ',        BINDFNC,    remmark},
  72.     {CTLX|'0',        BINDFNC,    delwind},
  73.     {CTLX|'1',        BINDFNC,    onlywind},
  74.     {CTLX|'2',        BINDFNC,    splitwind},
  75.     {CTLX|'A',        BINDFNC,    setvar},
  76.     {CTLX|'B',        BINDFNC,    usebuffer},
  77.     {CTLX|'C',        BINDFNC,    spawncli},
  78. #if    BSD || VMS || SUN || HPUX || AVIION
  79.     {CTLX|'D',        BINDFNC,    bktoshell},
  80. #endif
  81.     {CTLX|'E',        BINDFNC,    ctlxe},
  82.     {CTLX|'F',        BINDFNC,    setfillcol},
  83. #if    DEBUGM
  84.     {CTLX|'G',        BINDFNC,    dispvar},
  85. #endif
  86.     {CTLX|'K',        BINDFNC,    killbuffer},
  87.     {CTLX|'M',        BINDFNC,    setmod},
  88.     {CTLX|'N',        BINDFNC,    filename},
  89.     {CTLX|'O',        BINDFNC,    nextwind},
  90.     {CTLX|'P',        BINDFNC,    prevwind},
  91. #if    ISRCH
  92.     {CTLX|'R',        BINDFNC,    risearch},
  93.     {CTLX|'S',        BINDFNC,    fisearch},
  94. #endif
  95.     {CTLX|'W',        BINDFNC,    resize},
  96.     {CTLX|'X',        BINDFNC,    nextbuffer},
  97.     {CTLX|'Z',        BINDFNC,    enlargewind},
  98.     {META|CTRL|'C',     BINDFNC,    wordcount},
  99.     {META|CTRL|'E',     BINDFNC,    execproc},
  100.     {META|CTRL|'F',     BINDFNC,    getfence},
  101.     {META|CTRL|'G',     BINDFNC,    gotomark},
  102.     {META|CTRL|'H',     BINDFNC,    delbword},
  103.     {META|CTRL|'K',     BINDFNC,    unbindkey},
  104.     {META|CTRL|'L',     BINDFNC,    reposition},
  105.     {META|CTRL|'M',     BINDFNC,    delgmode},
  106.     {META|CTRL|'N',     BINDFNC,    namebuffer},
  107.     {META|CTRL|'R',     BINDFNC,    qreplace},
  108.     {META|CTRL|'S',     BINDFNC,    execfile},
  109.     {META|CTRL|'V',     BINDFNC,    nextdown},
  110.     {META|CTRL|'W',     BINDFNC,    killpara},
  111.     {META|CTRL|'X',     BINDFNC,    execcmd},
  112.     {META|CTRL|'Z',     BINDFNC,    nextup},
  113.     {META|' ',        BINDFNC,    setmark},
  114.     {META|'?',        BINDFNC,    help},
  115.     {META|'!',        BINDFNC,    reposition},
  116.     {META|')',        BINDFNC,    indent_region},
  117.     {META|'(',        BINDFNC,    undent_region},
  118.     {META|'.',        BINDFNC,    setmark},
  119.     {META|'>',        BINDFNC,    gotoeob},
  120.     {META|'<',        BINDFNC,    gotobob},
  121.     {META|'~',        BINDFNC,    unmark},
  122.     {META|'A',        BINDFNC,    apro},
  123.     {META|'B',        BINDFNC,    backword},
  124.     {META|'C',        BINDFNC,    capword},
  125.     {META|'D',        BINDFNC,    delfword},
  126. #if    CRYPT
  127.     {META|'E',        BINDFNC,    setekey},
  128. #endif
  129.     {META|'F',        BINDFNC,    forwword},
  130.     {META|'G',        BINDFNC,    gotoline},
  131.     {META|'K',        BINDFNC,    bindtokey},
  132.     {META|'L',        BINDFNC,    lowerword},
  133.     {META|'M',        BINDFNC,    setgmode},
  134.     {META|'N',        BINDFNC,    gotoeop},
  135.     {META|'P',        BINDFNC,    gotobop},
  136.     {META|'Q',        BINDFNC,    fillpara},
  137.     {META|'R',        BINDFNC,    sreplace},
  138. #if    BSD || HPUX || VMS || SUN || AVIION
  139.     {META|'S',        BINDFNC,    bktoshell},
  140. #endif
  141.     {META|'U',        BINDFNC,    upperword},
  142.     {META|'V',        BINDFNC,    backpage},
  143.     {META|'W',        BINDFNC,    copyregion},
  144.     {META|'X',        BINDFNC,    namedcmd},
  145.     {META|'Z',        BINDFNC,    quickexit},
  146.     {META|CTRL|'?',        BINDFNC,    delbword},
  147.  
  148. #if    MOUSE
  149.     {MOUS|'a',        BINDFNC,    movemd},
  150.     {MOUS|'b',        BINDFNC,    movemu},
  151.     {MOUS|'e',        BINDFNC,    mregdown},
  152.     {MOUS|'f',        BINDFNC,    mregup},
  153.     {MOUS|'1',        BINDFNC,    resizm},
  154. #endif 
  155.  
  156.     {ALTD|'B',        BINDFNC,    list_screens},
  157.     {ALTD|'D',        BINDFNC,    delete_screen},
  158.     {ALTD|'F',        BINDFNC,    find_screen},
  159.     {ALTD|'N',        BINDFNC,    next_screen},
  160.     {ALTD|'P',        BINDFNC,    prev_screen},
  161.     {ALTD|'R',        BINDFNC,    backhunt},
  162.     {ALTD|'S',        BINDFNC,    forwhunt},
  163.  
  164.     {SPEC|'<',        BINDFNC,    gotobob},
  165.     {SPEC|'P',        BINDFNC,    backline},
  166.     {SPEC|'Z',        BINDFNC,    backpage},
  167.     {SPEC|'B',        BINDFNC,    backchar},
  168.     {SPEC|'F',        BINDFNC,    forwchar},
  169.     {SPEC|'>',        BINDFNC,    gotoeob},
  170.     {SPEC|'N',        BINDFNC,    forwline},
  171.     {SPEC|'V',        BINDFNC,    forwpage},
  172.     {SPEC|'C',        BINDFNC,    insspace},
  173.     {SPEC|'D',        BINDFNC,    forwdel},
  174.     {SPEC|CTRL|'B',     BINDFNC,    backword},
  175.     {SPEC|CTRL|'F',     BINDFNC,    forwword},
  176.     {SPEC|CTRL|'Z',     BINDFNC,    gotobop},
  177.     {SPEC|CTRL|'V',     BINDFNC,    gotoeop},
  178.     {SPEC|SHFT|'1',     BINDFNC,    cbuf1},
  179.     {SPEC|SHFT|'2',     BINDFNC,    cbuf2},
  180.     {SPEC|SHFT|'3',     BINDFNC,    cbuf3},
  181.     {SPEC|SHFT|'4',     BINDFNC,    cbuf4},
  182.     {SPEC|SHFT|'5',     BINDFNC,    cbuf5},
  183.     {SPEC|SHFT|'6',     BINDFNC,    cbuf6},
  184.     {SPEC|SHFT|'7',     BINDFNC,    cbuf7},
  185.     {SPEC|SHFT|'8',     BINDFNC,    cbuf8},
  186.     {SPEC|SHFT|'9',     BINDFNC,    cbuf9},
  187.     {SPEC|SHFT|'0',     BINDFNC,    cbuf10},
  188.  
  189. #if    HP150
  190.     {SPEC|32,        BINDFNC,    backline},
  191.     {SPEC|33,        BINDFNC,    forwline},
  192.     {SPEC|35,        BINDFNC,    backchar},
  193.     {SPEC|34,        BINDFNC,    forwchar},
  194.     {SPEC|44,        BINDFNC,    gotobob},
  195.     {SPEC|46,        BINDFNC,    forwpage},
  196.     {SPEC|47,        BINDFNC,    backpage},
  197.     {SPEC|82,        BINDFNC,    nextwind},
  198.     {SPEC|68,        BINDFNC,    openline},
  199.     {SPEC|69,        BINDFNC,    killtext},
  200.     {SPEC|65,        BINDFNC,    forwdel},
  201.     {SPEC|64,        BINDFNC,    ctlxe},
  202.     {SPEC|67,        BINDFNC,    refresh},
  203.     {SPEC|66,        BINDFNC,    reposition},
  204.     {SPEC|83,        BINDFNC,    help},
  205.     {SPEC|81,        BINDFNC,    deskey},
  206. #endif
  207.  
  208. #if    HP110
  209.     {SPEC|0x4b,        BINDFNC,    backchar},
  210.     {SPEC|0x4d,        BINDFNC,    forwchar},
  211.     {SPEC|0x48,        BINDFNC,    backline},
  212.     {SPEC|0x50,        BINDFNC,    forwline},
  213.     {SPEC|0x43,        BINDFNC,    help},
  214.     {SPEC|0x73,        BINDFNC,    backword},
  215.     {SPEC|0x74,        BINDFNC,    forwword},
  216.     {SPEC|0x49,        BINDFNC,    backpage},
  217.     {SPEC|0x51,        BINDFNC,    forwpage},
  218.     {SPEC|84,        BINDFNC,    cbuf1},
  219.     {SPEC|85,        BINDFNC,    cbuf2},
  220.     {SPEC|86,        BINDFNC,    cbuf3},
  221.     {SPEC|87,        BINDFNC,    cbuf4},
  222.     {SPEC|88,        BINDFNC,    cbuf5},
  223.     {SPEC|89,        BINDFNC,    cbuf6},
  224.     {SPEC|90,        BINDFNC,    cbuf7},
  225.     {SPEC|91,        BINDFNC,    cbuf8},
  226. #endif
  227.  
  228. #if    AMIGA
  229.     {SPEC|'?',        BINDFNC,    help},
  230.     {SPEC|'A',        BINDFNC,    backline},
  231.     {SPEC|'B',        BINDFNC,    forwline},
  232.     {SPEC|'C',        BINDFNC,    forwchar},
  233.     {SPEC|'D',        BINDFNC,    backchar},
  234.     {SPEC|'T',        BINDFNC,    backpage},
  235.     {SPEC|'S',        BINDFNC,    forwpage},
  236.     {SPEC|'a',        BINDFNC,    backword},
  237.     {SPEC|'`',        BINDFNC,    forwword},
  238.     {SPEC|'P',        BINDFNC,    cbuf1},
  239.     {SPEC|'Q',        BINDFNC,    cbuf2},
  240.     {SPEC|'R',        BINDFNC,    cbuf3},
  241.     {SPEC|'S',        BINDFNC,    cbuf4},
  242.     {SPEC|'T',        BINDFNC,    cbuf5},
  243.     {SPEC|'U',        BINDFNC,    cbuf6},
  244.     {SPEC|'V',        BINDFNC,    cbuf7},
  245.     {SPEC|'W',        BINDFNC,    cbuf8},
  246.     {SPEC|'X',        BINDFNC,    cbuf9},
  247.     {SPEC|'Y',        BINDFNC,    cbuf10},
  248.     {127,            BINDFNC,    forwdel},
  249. #endif
  250.  
  251. #if    ST520
  252.     {SPEC|CTRL|'5',        BINDFNC,    help},
  253. #endif
  254.  
  255. #if  WANGPC
  256.     SPEC|0xE0,        BINDFNC,    quit,        /* Cancel */
  257.     SPEC|0xE1,        BINDFNC,    help,        /* Help */
  258.     SPEC|0xF1,        BINDFNC,    help,        /* ^Help */
  259.     SPEC|0xE3,        BINDFNC,    ctrlg,        /* Print */
  260.     SPEC|0xF3,        BINDFNC,    ctrlg,        /* ^Print */
  261.     SPEC|0xC0,        BINDFNC,    backline,    /* North */
  262.     SPEC|0xD0,        BINDFNC,    gotobob,    /* ^North */
  263.     SPEC|0xC1,        BINDFNC,    forwchar,    /* East */
  264.     SPEC|0xD1,        BINDFNC,    gotoeol,    /* ^East */
  265.     SPEC|0xC2,        BINDFNC,    forwline,    /* South */
  266.     SPEC|0xD2,        BINDFNC,    gotobop,    /* ^South */
  267.     SPEC|0xC3,        BINDFNC,    backchar,    /* West */
  268.     SPEC|0xD3,        BINDFNC,    gotobol,    /* ^West */
  269.     SPEC|0xC4,        BINDFNC,    ctrlg,        /* Home */
  270.     SPEC|0xD4,        BINDFNC,    gotobob,    /* ^Home */
  271.     SPEC|0xC5,        BINDFNC,    filesave,    /* Execute */
  272.     SPEC|0xD5,        BINDFNC,    ctrlg,        /* ^Execute */
  273.     SPEC|0xC6,        BINDFNC,    insfile,    /* Insert */
  274.     SPEC|0xD6,        BINDFNC,    ctrlg,        /* ^Insert */
  275.     SPEC|0xC7,        BINDFNC,    forwdel,    /* Delete */
  276.     SPEC|0xD7,        BINDFNC,    killregion,    /* ^Delete */
  277.     SPEC|0xC8,        BINDFNC,    backpage,    /* Previous */
  278.     SPEC|0xD8,        BINDFNC,    prevwind,    /* ^Previous */
  279.     SPEC|0xC9,        BINDFNC,    forwpage,    /* Next */
  280.     SPEC|0xD9,        BINDFNC,    nextwind,    /* ^Next */
  281.     SPEC|0xCB,        BINDFNC,    ctrlg,        /* Erase */
  282.     SPEC|0xDB,        BINDFNC,    ctrlg,        /* ^Erase */
  283.     SPEC|0xDC,        BINDFNC,    ctrlg,        /* ^Tab */
  284.     SPEC|0xCD,        BINDFNC,    ctrlg,        /* BackTab */
  285.     SPEC|0xDD,        BINDFNC,    ctrlg,        /* ^BackTab */
  286.     SPEC|0x80,        BINDFNC,    ctrlg,        /* Indent */
  287.     SPEC|0x90,        BINDFNC,    ctrlg,        /* ^Indent */
  288.     SPEC|0x81,        BINDFNC,    ctrlg,        /* Page */
  289.     SPEC|0x91,        BINDFNC,    ctrlg,        /* ^Page */
  290.     SPEC|0x82,        BINDFNC,    ctrlg,        /* Center */
  291.     SPEC|0x92,        BINDFNC,    ctrlg,        /* ^Center */
  292.     SPEC|0x83,        BINDFNC,    ctrlg,        /* DecTab */
  293.     SPEC|0x93,        BINDFNC,    ctrlg,        /* ^DecTab */
  294.     SPEC|0x84,        BINDFNC,    ctrlg,        /* Format */
  295.     SPEC|0x94,        BINDFNC,    ctrlg,        /* ^Format */
  296.     SPEC|0x85,        BINDFNC,    ctrlg,        /* Merge */
  297.     SPEC|0x95,        BINDFNC,    ctrlg,        /* ^Merge */
  298.     SPEC|0x86,        BINDFNC,    setmark,    /* Note */
  299.     SPEC|0x96,        BINDFNC,    ctrlg,        /* ^Note */
  300.     SPEC|0x87,        BINDFNC,    ctrlg,        /* Stop */
  301.     SPEC|0x97,        BINDFNC,    ctrlg,        /* ^Stop */
  302.     SPEC|0x88,        BINDFNC,    forwsearch,    /* Srch */
  303.     SPEC|0x98,        BINDFNC,    backsearch,    /* ^Srch */
  304.     SPEC|0x89,        BINDFNC,    sreplace,    /* Replac */
  305.     SPEC|0x99,        BINDFNC,    qreplace,    /* ^Replac */
  306.     SPEC|0x8A,        BINDFNC,    ctrlg,        /* Copy */
  307.     SPEC|0x9A,        BINDFNC,    ctrlg,        /* ^Copy */
  308.     SPEC|0x8B,        BINDFNC,    ctrlg,        /* Move */
  309.     SPEC|0x9B,        BINDFNC,    ctrlg,        /* ^Move */
  310.     SPEC|0x8C,        BINDFNC,    namedcmd,    /* Command */
  311.     SPEC|0x9C,        BINDFNC,    spawn,        /* ^Command */
  312.     SPEC|0x8D,        BINDFNC,    ctrlg,        /* ^ */
  313.     SPEC|0x9D,        BINDFNC,    ctrlg,        /* ^^ */
  314.     SPEC|0x8E,        BINDFNC,    ctrlg,        /* Blank */
  315.     SPEC|0x9E,        BINDFNC,    ctrlg,        /* ^Blank */
  316.     SPEC|0x8F,        BINDFNC,    gotoline,    /* GoTo */
  317.     SPEC|0x9F,        BINDFNC,    usebuffer,    /* ^GoTo */
  318. #endif
  319.  
  320.     {CTRL|'?',        BINDFNC,    backdel},
  321.  
  322.     {0,            BINDNUL,    NULL}
  323. };
  324.